unit u_DM_For_XML;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, FileUtil;

type
  TDataModule1 = class(TDataModule)
  private
    { private declarations }
  public
    { public declarations }

  end;

var
  DataModule1: TDataModule1;

implementation

{$R *.lfm}
        //Денис пишет приложение, чтобы заполнять/считывать БД из xml файла, как допишет, добавим в этот модуль
end.

